home *** CD-ROM | disk | FTP | other *** search
- object Form1: TForm1
- Left = 244
- Top = 129
- Width = 435
- Height = 308
- ActiveControl = Colors
- Caption = 'Form1'
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- PixelsPerInch = 120
- Scaled = False
- OnCreate = FormCreate
- TextHeight = 16
- object P1: TPanel
- Left = 0
- Top = 0
- Width = 427
- Height = 30
- Align = alTop
- TabOrder = 0
- object L1: TLabel
- Left = 352
- Top = 6
- Width = 28
- Height = 16
- Caption = 'point'
- end
- object Colors: TButton
- Left = 8
- Top = 4
- Width = 57
- Height = 21
- Caption = 'Colors'
- TabOrder = 0
- OnClick = ColorsClick
- end
- object Fonts: TButton
- Left = 72
- Top = 4
- Width = 57
- Height = 21
- Caption = 'Fonts'
- TabOrder = 1
- OnClick = ShowTestPattern
- end
- object Size: TEdit
- Left = 312
- Top = 4
- Width = 33
- Height = 24
- TabOrder = 4
- Text = '10'
- OnExit = SizeLostFocus
- end
- object LazyWrite: TCheckBox
- Left = 216
- Top = 6
- Width = 89
- Height = 17
- Caption = 'LazyWrite'
- TabOrder = 3
- OnClick = LazyWriteClick
- end
- object Clear: TButton
- Left = 136
- Top = 4
- Width = 65
- Height = 21
- Caption = 'Clear'
- TabOrder = 2
- OnClick = ClearClick
- end
- end
- object Terminal1: TColorConsole
- Left = 0
- Top = 30
- Width = 427
- Height = 247
- Align = alClient
- ParentColor = False
- Font.Color = clWindowText
- Font.Height = -17
- Font.Name = 'Courier'
- Font.Style = []
- Options = [coAutoTracking, coCheckBreak, coLazyWrite, coStdOutput]
- Rows = 50
- LineBreak = CRLF
- end
- end
-